home *** CD-ROM | disk | FTP | other *** search
/ MacAddict 117 / MacAddict 117.dmg / Software / Internet & Communication / Snak 5.1 (shareware).dmg / Snak.app / Contents / Resources / Scripts / pp-silly.irc < prev    next >
Text File  |  2005-08-04  |  23KB  |  822 lines
  1. # ########################################################################## #
  2. #                      PurePak - The sequel to TextBox                       #
  3. #                          A -+ TEXT +- production                           #
  4. # ########################################################################## #
  5. # Author: Crypt Keeper [ckeeper@axiom.access.one.net] (CKeeper on IRC)
  6. # Version 2.07
  7. #
  8. # This script requires at least ircII2.2.9 (Unix) or a fully ircII compatible
  9. # client.  It has only been tested under Unix with ircII2.2.9 and ircII2.8.
  10. #
  11. # If you edit this file, you must edit it with a Unix text editor or use
  12. # utilities like dos2unix/unix2dos to convert it to DOS to edit and then
  13. # back to Unix.  If it is edited in a DOS text editor it will be corrupted.
  14. #
  15. # PurePak version 2.07 IRC script
  16. # Copyright (C) 1995
  17. #
  18. # This program is free software; you can redistribute it and/or modify
  19. # it under the terms of the GNU General Public License as published by
  20. # the Free Software Foundation; either version 1, or (at your option)
  21. # any later version.
  22. #
  23. # This program is distributed in the hope that it will be useful,
  24. # but WITHOUT ANY WARRANTY; without even the implied warranty of
  25. # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  26. # GNU General Public License for more details.
  27. #
  28. # You should have received a copy of the GNU General Public License
  29. # along with this program; if not, write to the Free Software
  30. # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  31. # ########################################################################## #
  32.  
  33. # Useless, annoying things module
  34. @ PP.SILLY = 1
  35.  
  36. # ----------------------------------------------------------------------------
  37. # ASCII art: the surest way to get kicked!
  38. # ----------------------------------------------------------------------------
  39.  
  40. alias silly.art.dhead {
  41.     sendto $0    /~o~\\
  42.     sendto $0   /     \\   YOU DICKHEAD!!!
  43.     sendto $0  /       \\
  44.     sendto $0 (((((O)))))
  45.     sendto $0   |     |
  46. }
  47. alias silly.art.humpindogs {
  48.     sendto $0      o__/- \\
  49.     sendto $0      \\/__   \\__  
  50.     sendto $0  \/ __   //\\   \\    / 
  51.     sendto $0  o_/o \\-//--\\   \\_/   
  52.     sendto $0 ~\\/___  ____=o  |   
  53.     sendto $0     _/_/    \\/_/      
  54.     sendto $0        /\\
  55.     sendto $0    ---------------- 
  56. }
  57. alias silly.art.homer {
  58.     sendto $0    _____
  59.     sendto $0   /     \\
  60.     sendto $0 \\/\\/     |
  61.     sendto $0  |  (o)(o)
  62.     sendto $0  C   .---_)
  63.     sendto $0   | |.___|  d0h!!!!
  64.     sendto $0   |  \\__/
  65.     sendto $0   /_____\\
  66.     sendto $0  /____/\_\\  
  67. }
  68. alias silly.art.bart {
  69.     sendto $0   ||/|/|/|
  70.     sendto $0   |      |
  71.     sendto $0   |  (o)(o)
  72.     sendto $0   C       )
  73.     sendto $0   |   /__|  Dont have a cow man!
  74.     sendto $0   |    /
  75.     sendto $0  /     |
  76. }
  77. alias silly.art.crapcow2 {
  78.     sendto $0         |     (oo)
  79.     sendto $0   o=o=o=|------\\/
  80.     sendto $0         |      |
  81.     sendto $0  oo     ||----||
  82.     sendto $0 oooo    ^^    ^^
  83. }
  84. alias silly.art.neener {
  85.     sendto $0         \\|/ ____ \\|/
  86.     sendto $0         ~@-/ oO \\-@~
  87.     sendto $0         /_( \__/ )_\\
  88.     sendto $0            \\__U_/
  89.     sendto $0    Neener, neener, neener.
  90. }
  91. alias silly.art.lame {
  92.     sendto $0 :'##::::::::::'###::::'##::::'##:'########:
  93.     sendto $0 : ##:::::::::'## ##::: ###::'###: ##.....::
  94.     sendto $0 : ##::::::::'##:. ##:: ####'####: ##:::::::
  95.     sendto $0 : ##:::::::'##:::. ##: ## ### ##: ######:::
  96.     sendto $0 : ##::::::: #########: ##. #: ##: ##...::::
  97.     sendto $0 : ##::::::: ##.... ##: ##:.:: ##: ##:::::::
  98.     sendto $0 : ########: ##:::: ##: ##:::: ##: ########:
  99.     sendto $0 ::........::..:::::..::..:::::..::........:
  100. }
  101. alias silly.art.spam {
  102.     sendto $0 ,dP""8a "888888b,  d8b    "888b  ,888" EaT iT
  103.     sendto $0 88b   "  888  d88 dPY8b    88Y8b,8888
  104.     sendto $0 `"Y8888a 888ad8P'dPaaY8b   88 Y88P888  TaSTe iT
  105.     sendto $0 a,   Y88 888    dP    Y8b  88  YP 888
  106.     sendto $0 `"8ad8P'a888a  a88a *a888aa88a   a888a KiSS iT
  107. }
  108. alias silly.art.train {
  109.     sendto $0       . . . . o o o o o
  110.     sendto $0              _____      o       _______
  111.     sendto $0     ____====  ]OO|_n_n__][.     |lamer|
  112.     sendto $0    [________]_|__|________)<    |ville|
  113.     sendto $0     oo    oo  'oo OOOO-| oo\\_   ~~~|~~~
  114.     sendto $0 +--+--+--+--+--+--+--+--+-$1-+--+--+--+--+--+
  115. }
  116. alias silly.art.sopbeg {/sendto $0 [SuBLiMiNaL oPS BeG] Hi there every+one!  H+ow's it g+oing?}
  117. alias silly.art.spamcow {
  118.     sendto $0    (__) *SSSSS**PPPPP***AAA***MM***MM*
  119.     sendto $0    /oo\\_*S******P***P**A***A**M*M*M*M*\\;/sendto $0    \\  /~*SSSSS**PPPPP**AAAAA**M**M**M* |
  120.     sendto $0     oo  *****S**P******A***A**M*****M* |
  121.     sendto $0         *SSSSS**P******A***A**M*****M* ^
  122.     sendto $0          | |                       | |
  123.     sendto $0          ^ ^                       ^ ^
  124. }
  125. alias silly.art.bong {
  126.     sendto $0            _____
  127.     sendto $0            | A |   RoaST a BoWL!
  128.     sendto $0            | N |
  129.     sendto $0            | A |
  130.     sendto $0            | U |  \) \);/sendto $0            | J |   \(;/sendto $0            | I | \( \);/sendto $0            | R |  \);/sendto $0            | A | \);/sendto $0            | M |
  131.     sendto $0            | o | U
  132.     sendto $0            |   |//
  133.     sendto $0            |   |/
  134.     sendto $0            |   |
  135.     sendto $0           /|___|\\;/sendto $0           \\_____/
  136. }
  137. alias silly.art.humpincows {
  138.     sendto $0             (___)
  139.     sendto $0             (o o)  <===== $1
  140.     sendto $0       /------\\ /   (__)
  141.     sendto $0      /    ____O    (oo)   <===== $2-
  142.     sendto $0     |   / /----\\----\\/
  143.     sendto $0     /\\oo===|  /    ||
  144.     sendto $0    | ||   *||^-----||
  145.     sendto $0    *  ^^   ^^      ^^
  146. }
  147. alias silly.art.crapcow {
  148.     sendto $0 (__) <== $1
  149.     sendto $0 /oo\\________
  150.     sendto $0 \\  /        \\;/sendto $0  \\/      /   \\;/sendto $0    \\_|___\\_|/.\\;/sendto $0     ||   YY| o '
  151.     sendto $0     ||    || O <== $2
  152.     sendto $0     ^^    ^^
  153. }
  154. alias silly.art.sitonthis {
  155.     sendto $0    n         /
  156.     sendto $0    H     o     o
  157.     sendto $0  nnHnn      [      S1T 0N TH1Z AND R0T4T3!
  158.     sendto $0  VVVVV     ___/
  159. }
  160. alias silly.art.flickoff { 
  161.     sendto $0            _____
  162.     sendto $0            |_ _|
  163.     sendto $0       n    (O O)    n
  164.     sendto $0       H   _|\\_/|_   H
  165.     sendto $0      nHnn/ \\___/ \\nnHn
  166.     sendto $0     <V VV /     \ VV V>
  167.     sendto $0      \\__\\/|     |\\/__/ 
  168. }
  169. alias silly.art.borgcow {
  170.     sendto $0       "We are cow."
  171.     sendto $0  (__)
  172.     sendto $0  /oo\\################
  173.     sendto $0  \\  /################\\;/sendto $0   \\/ ################ |
  174.     sendto $0      ################ |
  175.     sendto $0      ################ |
  176.     sendto $0      ################
  177.     sendto $0       | |        | |
  178.     sendto $0       ^ ^        ^ ^
  179. }
  180. alias silly.art.ops {
  181.     sendto $0     <<<<                 +o+o+o+o+o+ o+o+o+o+o+o+ o+o+o+o+o+o 
  182.     sendto $0    <<<<                  o+o     o+o +o+      o+o +o+         
  183.     sendto $0   <<<<                   +o+     +o+ o+o      +o+ o+o         
  184.     sendto $0  <<<<=================   o+o     o+o +o+      o+o +o+o+o+o+o+ 
  185.     sendto $0  <<<<=================   +o+     +o+ o+o+o+o+o+o+ o+o+o+o+o+o 
  186.     sendto $0   <<<<                   o+o     o+o +o+                  +o+ 
  187.     sendto $0    <<<<                  +o+     +o+ o+o                  o+o 
  188.     sendto $0     <<<<                 o+o+o+o+o+o +o+          +o+o+o+o+o+ 
  189. }
  190. alias silly.art.deadcat {
  191.     sendto $0               /\\;/sendto $0              /  \\_______/\\/\\;/sendto $0             /               \\;/sendto $0             |_  -X     XX _ /
  192.     sendto $0             \\ ~-_  oo  _-~  |
  193.     sendto $0             -\\--- ____ -----/
  194.     sendto $0               \\-~   \\_\\ ~-_/
  195.     sendto $0             -~ ~~\\       / ~
  196.     sendto $0                   !WOEM
  197. }
  198. alias silly.art.cat {
  199.     sendto $0  _ __/|
  200.     sendto $0  \\'X.X'
  201.     sendto $0  =(___)= Meow!
  202.     sendto $0      U
  203. }
  204. alias silly.art.w00p {
  205.     sendto $0                      ____  ____
  206.     sendto $0            _      __/ __ \\/ __ \\____
  207.     sendto $0           | | /| / / / / / / / / __ \\;/sendto $0           | |/ |/ / /_/ / /_/ / /_/ /
  208.     sendto $0           |__/|__/\\____/\\____/ .___/
  209.     sendto $0                             /_/
  210. }
  211. alias ascii {
  212.     if ([$0])
  213.     {
  214.         if (match($0 SOPBEG SPAMCOW BONG SITONTHIS BORGCOW OPS DEADCAT CAT W00P NEENER LAME SPAM DHEAD HUMPINDOGS HOMER BART CRAPCOW2))
  215.         {
  216.             if ([$1]) 
  217.             {
  218.                 /silly.art.$0 $1
  219.             }
  220.             {
  221.                 /silly.art.$0 $T
  222.             }
  223.         }
  224.         {
  225.             if (match($0 TRAIN HUMPINCOWS CRAPCOW))
  226.             {
  227.                 if ([$0] == [TRAIN])
  228.                 {
  229.                     if ([$2]) {/silly.art.train $2 $1}
  230.                     {
  231.                         if ([$1]) {/silly.art.train $1} {/silly.art.train $T}
  232.                     }
  233.                 }
  234.                 {
  235.                     if ([$3]) {/silly.art.$0 $3 $1 $2}
  236.                     {
  237.                         if ([$2]) {/silly.art.$0 $T $1 $2} {/echo *** You need two nicks for the $0}
  238.                     }
  239.                 }
  240.             } {/echo *** No such ascii art: $0}
  241.         }
  242.     }
  243.     {
  244.         echo *** /ascii <name of ascii art> [<any other parameters>] [<nick/channel>]
  245.         echo *** Available ascii art:
  246.         echo ***   train <nick> - Train to lamerville running over <nick>
  247.         echo ***   sopbeg - "Subliminal ops beg"
  248.         echo ***   spamcow - Where spam comes from
  249.         echo ***   bong - Roast a bowl!
  250.         echo ***   humpincows [<who's on top>] [<who's on bottom>] - Humping cows
  251.         echo ***   crapcow [<who's the cow>] [<who's the crap>] - Crapping cow
  252.         echo ***   sitonthis - The finger with "Sit on this and rotate!"
  253.         echo ***   borgcow - "We are cow."
  254.         echo ***   ops - Huge sign begging for ops
  255.         echo ***   deadcat - An ex-cat
  256.         echo ***   cat - A living cat
  257.         echo ***   w00p - Big "w00p" sign
  258.         echo ***   spam - Big SPAM graphic
  259.         echo ***   neener - "Neener Neener Neener!"
  260.         echo ***   lame - Big "lame" sign
  261.         echo ***   dhead - You dickhead!
  262.         echo ***   humpindogs - Like it says
  263.         echo ***   homer - Homer Simpson
  264.         echo ***   bart - Bart Simpson
  265.         echo ***   crapcow2 - Another crapping cow
  266.     }
  267. }
  268.  
  269. # ----------------------------------------------------------------------------
  270. # Big text writer
  271. # ----------------------------------------------------------------------------
  272.  
  273. @ SILLY.BIG.1.A = [ /// ]
  274. @ SILLY.BIG.2.A = [/   /]
  275. @ SILLY.BIG.3.A = [/////]
  276. @ SILLY.BIG.4.A = [/   /]
  277. @ SILLY.BIG.5.A = [/   /]
  278.  
  279. @ SILLY.BIG.1.B = [//// ]
  280. @ SILLY.BIG.2.B = [/   /]
  281. @ SILLY.BIG.3.B = [//// ]
  282. @ SILLY.BIG.4.B = [/   /]
  283. @ SILLY.BIG.5.B = [//// ]
  284.  
  285. @ SILLY.BIG.1.C = [/////]
  286. @ SILLY.BIG.2.C = [/    ]
  287. @ SILLY.BIG.3.C = [/    ]
  288. @ SILLY.BIG.4.C = [/    ]
  289. @ SILLY.BIG.5.C = [/////]
  290.  
  291. @ SILLY.BIG.1.D = [//// ]
  292. @ SILLY.BIG.2.D = [/   /]
  293. @ SILLY.BIG.3.D = [/   /]
  294. @ SILLY.BIG.4.D = [/   /]
  295. @ SILLY.BIG.5.D = [//// ]
  296.  
  297. @ SILLY.BIG.1.E = [/////]
  298. @ SILLY.BIG.2.E = [/    ]
  299. @ SILLY.BIG.3.E = [///  ]
  300. @ SILLY.BIG.4.E = [/    ]
  301. @ SILLY.BIG.5.E = [/////]
  302.  
  303. @ SILLY.BIG.1.F = [/////]
  304. @ SILLY.BIG.2.F = [/    ]
  305. @ SILLY.BIG.3.F = [///  ]
  306. @ SILLY.BIG.4.F = [/    ]
  307. @ SILLY.BIG.5.F = [/    ]
  308.  
  309. @ SILLY.BIG.1.G = [/////]
  310. @ SILLY.BIG.2.G = [/    ]
  311. @ SILLY.BIG.3.G = [/  //]
  312. @ SILLY.BIG.4.G = [/   /]
  313. @ SILLY.BIG.5.G = [/////]
  314.  
  315. @ SILLY.BIG.1.H = [/   /]
  316. @ SILLY.BIG.2.H = [/   /]
  317. @ SILLY.BIG.3.H = [/////]
  318. @ SILLY.BIG.4.H = [/   /]
  319. @ SILLY.BIG.5.H = [/   /]
  320.  
  321. @ SILLY.BIG.1.I = [/////]
  322. @ SILLY.BIG.2.I = [  /  ]
  323. @ SILLY.BIG.3.I = [  /  ]
  324. @ SILLY.BIG.4.I = [  /  ]
  325. @ SILLY.BIG.5.I = [/////]
  326.  
  327. @ SILLY.BIG.1.J = [    /]
  328. @ SILLY.BIG.2.J = [    /]
  329. @ SILLY.BIG.3.J = [    /]
  330. @ SILLY.BIG.4.J = [/   /]
  331. @ SILLY.BIG.5.J = [/////]
  332.  
  333. @ SILLY.BIG.1.K = [/   /]
  334. @ SILLY.BIG.2.K = [/  / ]
  335. @ SILLY.BIG.3.K = [///  ]
  336. @ SILLY.BIG.4.K = [/  / ]
  337. @ SILLY.BIG.5.K = [/   /]
  338.  
  339. @ SILLY.BIG.1.L = [/    ]
  340. @ SILLY.BIG.2.L = [/    ]
  341. @ SILLY.BIG.3.L = [/    ]
  342. @ SILLY.BIG.4.L = [/    ]
  343. @ SILLY.BIG.5.L = [/////]
  344.  
  345. @ SILLY.BIG.1.M = [ /// ]
  346. @ SILLY.BIG.2.M = [/ / /]
  347. @ SILLY.BIG.3.M = [/ / /]
  348. @ SILLY.BIG.4.M = [/   /]
  349. @ SILLY.BIG.5.M = [/   /]
  350.  
  351. @ SILLY.BIG.1.N = [/   /]
  352. @ SILLY.BIG.2.N = [//  /]
  353. @ SILLY.BIG.3.N = [/ / /]
  354. @ SILLY.BIG.4.N = [/  //]
  355. @ SILLY.BIG.5.N = [/   /]
  356.  
  357. @ SILLY.BIG.1.O = [/////]
  358. @ SILLY.BIG.2.O = [/   /]
  359. @ SILLY.BIG.3.O = [/   /]
  360. @ SILLY.BIG.4.O = [/   /]
  361. @ SILLY.BIG.5.O = [/////]
  362.  
  363. @ SILLY.BIG.1.P = [/////]
  364. @ SILLY.BIG.2.P = [/   /]
  365. @ SILLY.BIG.3.P = [/////]
  366. @ SILLY.BIG.4.P = [/    ]
  367. @ SILLY.BIG.5.P = [/    ]
  368.  
  369. @ SILLY.BIG.1.Q = [/////]
  370. @ SILLY.BIG.2.Q = [/   /]
  371. @ SILLY.BIG.3.Q = [/   /]
  372. @ SILLY.BIG.4.Q = [/  //]
  373. @ SILLY.BIG.5.Q = [/////]
  374.  
  375. @ SILLY.BIG.1.R = [/////]
  376. @ SILLY.BIG.2.R = [/   /]
  377. @ SILLY.BIG.3.R = [/////]
  378. @ SILLY.BIG.4.R = [///  ]
  379. @ SILLY.BIG.5.R = [/  //]
  380.  
  381. @ SILLY.BIG.1.S = [/////]
  382. @ SILLY.BIG.2.S = [/    ]
  383. @ SILLY.BIG.3.S = [/////]
  384. @ SILLY.BIG.4.S = [    /]
  385. @ SILLY.BIG.5.S = [/////]
  386.  
  387. @ SILLY.BIG.1.T = [/////]
  388. @ SILLY.BIG.2.T = [  /  ]
  389. @ SILLY.BIG.3.T = [  /  ]
  390. @ SILLY.BIG.4.T = [  /  ]
  391. @ SILLY.BIG.5.T = [  /  ]
  392.  
  393. @ SILLY.BIG.1.U = [/   /]
  394. @ SILLY.BIG.2.U = [/   /]
  395. @ SILLY.BIG.3.U = [/   /]
  396. @ SILLY.BIG.4.U = [/   /]
  397. @ SILLY.BIG.5.U = [/////]
  398.  
  399. @ SILLY.BIG.1.V = [/   /]
  400. @ SILLY.BIG.2.V = [/   /]
  401. @ SILLY.BIG.3.V = [ / / ]
  402. @ SILLY.BIG.4.V = [ / / ]
  403. @ SILLY.BIG.5.V = [  /  ]
  404.  
  405. @ SILLY.BIG.1.W = [/   /]
  406. @ SILLY.BIG.2.W = [/   /]
  407. @ SILLY.BIG.3.W = [/ / /]
  408. @ SILLY.BIG.4.W = [/ / /]
  409. @ SILLY.BIG.5.W = [ / / ]
  410.  
  411. @ SILLY.BIG.1.X = [/   /]
  412. @ SILLY.BIG.2.X = [ / / ]
  413. @ SILLY.BIG.3.X = [  /  ]
  414. @ SILLY.BIG.4.X = [ / / ]
  415. @ SILLY.BIG.5.X = [/   /]
  416.  
  417. @ SILLY.BIG.1.Y = [/   /]
  418. @ SILLY.BIG.2.Y = [ / / ]
  419. @ SILLY.BIG.3.Y = [  /  ]
  420. @ SILLY.BIG.4.Y = [  /  ]
  421. @ SILLY.BIG.5.Y = [  /  ]
  422.  
  423. @ SILLY.BIG.1.Z = [/////]
  424. @ SILLY.BIG.2.Z = [   / ]
  425. @ SILLY.BIG.3.Z = [  /  ]
  426. @ SILLY.BIG.4.Z = [ /   ]
  427. @ SILLY.BIG.5.Z = [/////]
  428.  
  429. @ SILLY.BIG.1.0 = [ /// ]
  430. @ SILLY.BIG.2.0 = [/   /]
  431. @ SILLY.BIG.3.0 = [/   /]
  432. @ SILLY.BIG.4.0 = [/   /]
  433. @ SILLY.BIG.5.0 = [ /// ]
  434.  
  435. @ SILLY.BIG.1.1 = [  /  ]
  436. @ SILLY.BIG.2.1 = [ //  ]
  437. @ SILLY.BIG.3.1 = [  /  ]
  438. @ SILLY.BIG.4.1 = [  /  ]
  439. @ SILLY.BIG.5.1 = [/////]
  440.  
  441. @ SILLY.BIG.1.2 = [/////]
  442. @ SILLY.BIG.2.2 = [/  / ]
  443. @ SILLY.BIG.3.2 = [  /  ]
  444. @ SILLY.BIG.4.2 = [ /   ]
  445. @ SILLY.BIG.5.2 = [/////]
  446.  
  447. @ SILLY.BIG.1.3 = [/////]
  448. @ SILLY.BIG.2.3 = [    /]
  449. @ SILLY.BIG.3.3 = [  ///]
  450. @ SILLY.BIG.4.3 = [    /]
  451. @ SILLY.BIG.5.3 = [/////]
  452.  
  453. @ SILLY.BIG.1.4 = [/   /]
  454. @ SILLY.BIG.2.4 = [/   /]
  455. @ SILLY.BIG.3.4 = [/////]
  456. @ SILLY.BIG.4.4 = [    /]
  457. @ SILLY.BIG.5.4 = [    /]
  458.  
  459. @ SILLY.BIG.1.5 = [/////]
  460. @ SILLY.BIG.2.5 = [/    ]
  461. @ SILLY.BIG.3.5 = [/////]
  462. @ SILLY.BIG.4.5 = [    /]
  463. @ SILLY.BIG.5.5 = [/////]
  464.  
  465. @ SILLY.BIG.1.6 = [/////]
  466. @ SILLY.BIG.2.6 = [/    ]
  467. @ SILLY.BIG.3.6 = [/////]
  468. @ SILLY.BIG.4.6 = [/   /]
  469. @ SILLY.BIG.5.6 = [/////]
  470.  
  471. @ SILLY.BIG.1.7 = [/////]
  472. @ SILLY.BIG.2.7 = [    /]
  473. @ SILLY.BIG.3.7 = [   / ]
  474. @ SILLY.BIG.4.7 = [  /  ]
  475. @ SILLY.BIG.5.7 = [ /   ]
  476.  
  477. @ SILLY.BIG.1.8 = [/////]
  478. @ SILLY.BIG.2.8 = [/   /]
  479. @ SILLY.BIG.3.8 = [/////]
  480. @ SILLY.BIG.4.8 = [/   /]
  481. @ SILLY.BIG.5.8 = [/////]
  482.  
  483. @ SILLY.BIG.1.9 = [/////]
  484. @ SILLY.BIG.2.9 = [/   /]
  485. @ SILLY.BIG.3.9 = [/////]
  486. @ SILLY.BIG.4.9 = [    /]
  487. @ SILLY.BIG.5.9 = [/////]
  488.  
  489. @ SILLY.BIG.1.PND = [ / / ]
  490. @ SILLY.BIG.2.PND = [/////]
  491. @ SILLY.BIG.3.PND = [ / / ]
  492. @ SILLY.BIG.4.PND = [/////]
  493. @ SILLY.BIG.5.PND = [ / / ]
  494.  
  495. @ SILLY.BIG.1.EXC = [  /  ]
  496. @ SILLY.BIG.2.EXC = [  /  ]
  497. @ SILLY.BIG.3.EXC = [  /  ]
  498. @ SILLY.BIG.4.EXC = [     ]
  499. @ SILLY.BIG.5.EXC = [  /  ]
  500.  
  501. @ SILLY.BIG.1.QUE = [/////]
  502. @ SILLY.BIG.2.QUE = [    /]
  503. @ SILLY.BIG.3.QUE = [  // ]
  504. @ SILLY.BIG.4.QUE = [     ]
  505. @ SILLY.BIG.5.QUE = [  /  ]
  506.  
  507. @ SILLY.BIG.1.PNT = [     ]
  508. @ SILLY.BIG.2.PNT = [     ]
  509. @ SILLY.BIG.3.PNT = [     ]
  510. @ SILLY.BIG.4.PNT = [     ]
  511. @ SILLY.BIG.5.PNT = [  /  ]
  512.  
  513. @ SILLY.BIG.1.SPC = [     ]
  514. @ SILLY.BIG.2.SPC = [     ]
  515. @ SILLY.BIG.3.SPC = [     ]
  516. @ SILLY.BIG.4.SPC = [     ]
  517. @ SILLY.BIG.5.SPC = [     ]
  518.  
  519. alias bigwrite {
  520.     if ([$1])
  521.     {
  522.         if (rindex($right(1 $1-) $1-) > 9) {/echo *** Too many characters (max 10)}
  523.         {
  524.             @ BPTR = 0
  525.             @ BLEN = rindex($right(1 $1-) $1-)
  526.             while (BPTR <= BLEN)
  527.             {
  528.                 @ BCHR = mid($BPTR 1 $1-)
  529.                 if (BCHR == [#]) {@ BCHR = [PND]}
  530.                 if (BCHR == [.]) {@ BCHR = [PNT]}
  531.                 if (BCHR == [!]) {@ BCHR = [EXC]}
  532.                 if (BCHR == [?]) {@ BCHR = [QUE]}
  533.                 if (BCHR == [ ]) {@ BCHR = [SPC]}
  534.                 @ BIG.1 = BIG.1##[ $SILLY.BIG.1[$BCHR]]
  535.                 @ BIG.2 = BIG.2##[ $SILLY.BIG.2[$BCHR]]
  536.                 @ BIG.3 = BIG.3##[ $SILLY.BIG.3[$BCHR]]
  537.                 @ BIG.4 = BIG.4##[ $SILLY.BIG.4[$BCHR]]
  538.                 @ BIG.5 = BIG.5##[ $SILLY.BIG.5[$BCHR]]
  539.                 @ BPTR = BPTR + 1
  540.             }
  541.             @ BIG.1 = [    $BIG.1]
  542.             @ BIG.2 = [   $BIG.2]
  543.             @ BIG.3 = [  $BIG.3]
  544.             @ BIG.4 = [ $BIG.4]
  545.             ^assign -BCHR
  546.             foreach BIG AA {
  547.                 sendto $0 $BIG[$AA]
  548.                 ^assign -BIG[$AA]
  549.             }
  550.             ^assign -BPTR
  551.             ^assign -BLEN
  552.         }
  553.     }
  554.     {
  555.         echo *** /bigwrite <nick/channel> <string to write> (max 10 chars)
  556.         echo *** Allowed characters: abcdefghijklmnopqrstuvwxyz0123456789#!?.
  557.     }
  558. }
  559. alias bigsay {/bigwrite $T $*}
  560.  
  561. # ----------------------------------------------------------------------------
  562. # "Eleet" writer
  563. # ----------------------------------------------------------------------------
  564.  
  565. @ SILLY.SANE  = [abcdefghijklmnopqrstuvwxyz]
  566. ASSIGN SILLY.LEET.0.0 a
  567. ASSIGN SILLY.LEET.0.1 A
  568. ASSIGN SILLY.LEET.0.2 @
  569. ASSIGN SILLY.LEET.0.3 a
  570. ASSIGN SILLY.LEET.1.0 b
  571. ASSIGN SILLY.LEET.1.1 B
  572. ASSIGN SILLY.LEET.1.2 |3
  573. ASSIGN SILLY.LEET.1.3 b
  574. ASSIGN SILLY.LEET.2.0 c
  575. ASSIGN SILLY.LEET.2.1 C
  576. ASSIGN SILLY.LEET.2.2 (
  577. ASSIGN SILLY.LEET.2.3 [
  578. ASSIGN SILLY.LEET.3.0 d
  579. ASSIGN SILLY.LEET.3.1 D
  580. ASSIGN SILLY.LEET.3.2 c|
  581. ASSIGN SILLY.LEET.3.3 |)
  582. ASSIGN SILLY.LEET.4.0 e
  583. ASSIGN SILLY.LEET.4.1 E
  584. ASSIGN SILLY.LEET.4.2 3
  585. ASSIGN SILLY.LEET.4.3 [-
  586. ASSIGN SILLY.LEET.5.0 f
  587. ASSIGN SILLY.LEET.5.1 F
  588. ASSIGN SILLY.LEET.5.2 /=
  589. ASSIGN SILLY.LEET.5.3 ph
  590. ASSIGN SILLY.LEET.6.0 g
  591. ASSIGN SILLY.LEET.6.1 G
  592. ASSIGN SILLY.LEET.6.2 9
  593. ASSIGN SILLY.LEET.6.3 g
  594. ASSIGN SILLY.LEET.7.0 h
  595. ASSIGN SILLY.LEET.7.1 H
  596. ASSIGN SILLY.LEET.7.2 /-/
  597. ASSIGN SILLY.LEET.7.3 |-|
  598. ASSIGN SILLY.LEET.8.0 i
  599. ASSIGN SILLY.LEET.8.1 I
  600. ASSIGN SILLY.LEET.8.2 1
  601. ASSIGN SILLY.LEET.8.3 !
  602. ASSIGN SILLY.LEET.9.0 j
  603. ASSIGN SILLY.LEET.9.1 J
  604. ASSIGN SILLY.LEET.9.2 j
  605. ASSIGN SILLY.LEET.9.3 j
  606. ASSIGN SILLY.LEET.10.0 k
  607. ASSIGN SILLY.LEET.10.1 K
  608. ASSIGN SILLY.LEET.10.2 |<
  609. ASSIGN SILLY.LEET.10.3 /<
  610. ASSIGN SILLY.LEET.11.0 l
  611. ASSIGN SILLY.LEET.11.1 L
  612. ASSIGN SILLY.LEET.11.2 |_
  613. ASSIGN SILLY.LEET.11.3 /_
  614. ASSIGN SILLY.LEET.12.0 m
  615. ASSIGN SILLY.LEET.12.1 M
  616. ASSIGN SILLY.LEET.12.2 |\/|
  617. ASSIGN SILLY.LEET.12.3 M
  618. ASSIGN SILLY.LEET.13.0 n
  619. ASSIGN SILLY.LEET.13.1 N
  620. ASSIGN SILLY.LEET.13.2 |\|
  621. ASSIGN SILLY.LEET.13.3 N
  622. ASSIGN SILLY.LEET.14.0 o
  623. ASSIGN SILLY.LEET.14.1 O
  624. ASSIGN SILLY.LEET.14.2 0
  625. ASSIGN SILLY.LEET.14.3 ()
  626. ASSIGN SILLY.LEET.15.0 p
  627. ASSIGN SILLY.LEET.15.1 P
  628. ASSIGN SILLY.LEET.15.2 |^
  629. ASSIGN SILLY.LEET.15.3 p
  630. ASSIGN SILLY.LEET.16.0 q
  631. ASSIGN SILLY.LEET.16.1 Q
  632. ASSIGN SILLY.LEET.16.2 Q
  633. ASSIGN SILLY.LEET.16.3 q
  634. ASSIGN SILLY.LEET.17.0 r
  635. ASSIGN SILLY.LEET.17.1 R
  636. ASSIGN SILLY.LEET.17.2 />
  637. ASSIGN SILLY.LEET.17.3 r
  638. ASSIGN SILLY.LEET.18.0 s
  639. ASSIGN SILLY.LEET.18.1 S
  640. ASSIGN SILLY.LEET.18.2 5
  641. ASSIGN SILLY.LEET.18.3 $
  642. ASSIGN SILLY.LEET.19.0 t
  643. ASSIGN SILLY.LEET.19.1 T
  644. ASSIGN SILLY.LEET.19.2 +
  645. ASSIGN SILLY.LEET.19.3 ~|~
  646. ASSIGN SILLY.LEET.20.0 u
  647. ASSIGN SILLY.LEET.20.1 U
  648. ASSIGN SILLY.LEET.20.2 (_)
  649. ASSIGN SILLY.LEET.20.3 |_|
  650. ASSIGN SILLY.LEET.21.0 v
  651. ASSIGN SILLY.LEET.21.1 V
  652. ASSIGN SILLY.LEET.21.2 \/
  653. ASSIGN SILLY.LEET.21.3 v
  654. ASSIGN SILLY.LEET.22.0 w
  655. ASSIGN SILLY.LEET.22.1 W
  656. ASSIGN SILLY.LEET.22.2 |/\|
  657. ASSIGN SILLY.LEET.22.3 W
  658. ASSIGN SILLY.LEET.23.0 x
  659. ASSIGN SILLY.LEET.23.1 X
  660. ASSIGN SILLY.LEET.23.2 )(
  661. ASSIGN SILLY.LEET.23.3 ><
  662. ASSIGN SILLY.LEET.24.0 y
  663. ASSIGN SILLY.LEET.24.1 Y
  664. ASSIGN SILLY.LEET.24.2 `/
  665. ASSIGN SILLY.LEET.24.3 y
  666. ASSIGN SILLY.LEET.25.0 z
  667. ASSIGN SILLY.LEET.25.1 Z
  668. ASSIGN SILLY.LEET.25.2 2
  669. ASSIGN SILLY.LEET.25.3 ~/_
  670.  
  671. alias silly.eleetf {
  672.     @ SANE.STR = [$*]
  673.     @ SANE.LEN = @SANE.STR
  674.     @ LEET.STR = []
  675.     @ LEET.LEN = 0
  676.     while (LEET.LEN < SANE.LEN)
  677.     {
  678.         @ LEET.IND = index($mid($LEET.LEN 1 $SANE.STR) $SILLY.SANE)
  679.         if (LEET.IND > -1)
  680.         {
  681.             @ LEET.STR = LEET.STR##SILLY.LEET[$LEET.IND][$rand(4)]
  682.         }
  683.         {
  684.             @ LEET.STR = LEET.STR##mid($LEET.LEN 1 $SANE.STR)
  685.         }
  686.         @ LEET.LEN = LEET.LEN + 1
  687.     }
  688.     @ FUNCTION_RETURN = LEET.STR
  689.     ^assign -LEET.LEN
  690.     ^assign -LEET.STR
  691.     ^assign -LEET.IND
  692.     ^assign -SANE.STR
  693.     ^assign -SANE.LEN
  694. }
  695.  
  696. alias kradwrite {/sendto $0 $silly.eleetf($1-)}
  697. alias kradsay {/say $silly.eleetf($0-)}
  698.  
  699. # ----------------------------------------------------------------------------
  700. # Fake invites, fake massdeop
  701. # ----------------------------------------------------------------------------
  702.  
  703. alias fakeinvite {
  704.     if ([$1])
  705.     {
  706.         ^assign INVITESTR $strip(# $1)
  707.         ^assign INVITESTR \#${INVITESTR}
  708.         quote INVITE $0 $INVITESTR
  709.         ^assign -INVITESTR
  710.         echo *** Fake invited $0 to channel $1
  711.     } {/echo *** /fakeinvite <nick> <channel>}
  712. }
  713.  
  714. # jokemassdeop [<deopnick>]
  715. alias jokemassdeop {
  716.     if ([$0]) {@ DOPNICK = [$0]} {@ DOPNICK = [$N]}
  717.     ^on ^who * {^if (([$1] != DOPNICK)&&(match(*@* $2))) {@ FDOPZ = FDOPZ##[$1 ]}}
  718.     //^who *
  719.     wait -CMD if (1) {
  720.         silly.dofakedop $FDOPZ
  721.         ^assign -DOPNICK
  722.         ^assign -FDOPZ
  723.         ^on who -
  724.     }
  725. }
  726. alias silly.dofakedop {
  727.     if ([$2])
  728.     {
  729.         me change "-ooo $0 $1 $2" on channel $C by $DOPNICK
  730.         if ([$3]) {/silly.dofakedop $3-}
  731.     }
  732.     {
  733.         if ([$1]) {/me change "-oo $0 $1" on channel $C by $DOPNICK}
  734.         {/me change "-o $0" on channel $C by $DOPNICK}
  735.     }
  736. }
  737.  
  738. # ----------------------------------------------------------------------------
  739. # -+ TEXT +- encryption
  740. # ----------------------------------------------------------------------------
  741.  
  742. # We add one setting to /pp : adecode on/off
  743. @ PP.SETCHECKS.SILLY = [^silly.sets]
  744.  
  745. # Decoding on/off
  746. EVAL ^if ([X$PP.SET.ADECODE] != [X]) {@ PP.SET.ADECODE = 1}
  747.  
  748. alias silly.sets {
  749.     if ([$0] == [ADECODE])
  750.     {
  751.         if (match($1 ON OFF)) {^if ([$1] == [ON]) {@ PP.SET.ADECODE = 1} {@ PP.SET.ADECODE = 0}}
  752.         if (PP.SET.ADECODE) {/echo *** Encryption decoding is now ON} {/echo *** Encryption decoding is now OFF}
  753.         @ VU = 1
  754.     }
  755. }
  756.  
  757. on -public "% % * ?? -+ TEXT +-" {
  758.     if (PP.SET.ADECODE)
  759.     {
  760.         if ([$1] == C)
  761.         {
  762.             ^timer 1 /echo [DECRYPT] <$0> $strip( $decode($left($index(" $2-) $2-)))
  763.         }
  764.         {
  765.             ^timer 1 /echo [DECRYPT] <$0:$1> $strip( $decode($left($index(" $2-) $2-)))
  766.         }
  767.     }
  768. }
  769. on #-msg 2 "% * ?? -+ TEXT +-" {^if (PP.SET.ADECODE) {^echo [DECRYPT] *$0* $strip( $decode($left($index(" $1-) $1-)))}}
  770. alias txt {/sendto $C $encode($0-)" $randcrap(2) -+ TEXT +-}
  771. alias ptxt {/sendto $0 $encode($1-)" $randcrap(2) -+ TEXT +-}
  772.  
  773. # ----------------------------------------------------------------------------
  774. # Other junk
  775. # ----------------------------------------------------------------------------
  776.  
  777. alias megaop {
  778.     //mode $C +o $0
  779.     //mode $C +oo $0 $0
  780.     //mode $C +ooo $0 $0 $0
  781.     //mode $C +oo $0 $0
  782.     //mode $C +o $0
  783. }
  784. alias gigaop {
  785.     //mode $C +o $0
  786.     //mode $C +oo $0 $0
  787.     //mode $C +ooo $0 $0 $0
  788.     //mode $C +oooo $0 $0 $0 $0
  789.     //mode $C +ooo $0 $0 $0
  790.     //mode $C +oo $0 $0
  791.     //mode $C +o $0
  792. }
  793.  
  794. alias w00p {
  795.     me *** PR3P4R1NG W00P F0R $0 ***
  796.     sleep 1
  797.     me *** T4RG3TT1NG $0 ***
  798.     sleep 1
  799.     sendto $C w00p!
  800.     me *** SUCC3SZFUL W00P ***
  801. }
  802.  
  803. alias rkick {
  804.     if (C)
  805.     {
  806.         ^on ^who * {^if ([$1] != N) {@ NIKZ = NIKZ##[ $1]}}
  807.         //^who *
  808.         wait -CMD if (1) {
  809.             ^on who -
  810.             if (NIKZ)
  811.             {
  812.                 //kick $C $word($rand($#NIKZ) $NIKZ) [Random Kick]
  813.             } {/echo *** Nobody to choose from!}
  814.             ^assign -NIKZ
  815.         }
  816.     } {/echo *** You aren't on any channels}
  817. }
  818.  
  819. # ----------------------------------------------------------------------------
  820.  
  821. EVAL ^if (!PP.SET.NOSTARTUP) {/echo -- PurePak silly module loaded}
  822.